﻿Namespace BusinessRule
    Public Class Person

        Private _getInstance As New WebCredit.ORM.Person_ORM
        Public Property getInstance() As WebCredit.ORM.Person_ORM
            Get
                Return _getInstance
            End Get
            Set(ByVal value As WebCredit.ORM.Person_ORM)
                _getInstance = value
            End Set
        End Property

        Public Function GetAll() As System.Collections.Generic.List(Of EntityClass.Person_Entity)

            Return getInstance.GetAll()
            
        End Function

    End Class
End Namespace

